CAAMoon_MeanElongation <-
function(JD){
.Call("CAAMoon_MeanElongation", JD)
}
